library(tidyverse)
library(gwasrapidd)

sle_studies <- get_studies(efo_trait = 'systemic lupus erythematosus')

top_study <- sle_studies@ancestries |>
  slice_max(number_of_individuals, n = 5)

best_assoc <- get_associations(study_id = 'GCST90255372')

get_associations(variant_id = 'rs140226575')
t <- get_variants(variant_id = 'rs140226575')
